home *** CD-ROM | disk | FTP | other *** search
- echo off
- if '%1' == '' goto NO_PARMS
- if '%2' == '' goto NO_PARMS
- goto OK
- :NO_PARMS
- echo USAGE: BTCLONE existing_file new_clone_file
- goto END
- :OK
- rem
- rem 'C' to choose Clone on opening menu, %1 the Btrieve file, '!' for ENTER,
- rem %2 the New file, '!' for enter, and '###' for ESC's.
- rem
- echo C%1!%2!### >btclone.txt
- btfiler /k:btclone.txt
- del btclone.txt
- :END